SunSoft Catalyst CDWARE 1996 May to August/Catalyst CDWARE 1996 May to August.iso/.products/.bin/httpd/Solaris_2/tt.pl

Perl Script | 1995-07-06 | 134b | 12 lines

#!./perl

open (ONLY,"/tmp/httpd/top");
while (<ONLY>) {
    $line = $_;
    @fields = split(/\^/,$_);
    print @fields[2];
}
close (OPEN);